home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 26 / Tiger_Disk_026_19xx_Tiger-Crew-Disk_de_Side_A.d64 / es kann losgehen (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  32 lines
  1. 1 s=49152:print"[147][152][148]          <shift>"
  2. 2 fora=stos+10:readx:pokea,x:next
  3. 3 data238,32,208,173,141,2,201,1,208,246,96
  4. 10 poke53280,.:poke53281,.:printchr$(147): rem ** gemacht von 'lukian' **
  5. 12 print"*** dein computer wartet auf befehle ***":
  6. 14 ti$="000003":wait161,5:print"[147]   willst du jetzt mit ihm arbeiten?"
  7. 16 print"                 [158](j/n)":
  8. 18 poke198,0:wait198,1:geta$
  9. 20 ifa$=chr$(78)goto 26
  10. 22 ifa$=chr$(74)goto 30
  11. 24 goto18
  12. 26 print"[147][152]  wozu hast du ihn dann eingeschaltet!":goto28
  13. 28 ti$="000003":wait161,5:goto46
  14. 30 print"[147][153]  fein! du weisst doch hoffentlich auch,";
  15. 32 print"       was du machen moechtest!?":
  16. 34 print"[151]                  (j/n)[144]":
  17. 36 poke198,0:wait198,1:getb$
  18. 38 ifb$=chr$(74)goto52
  19. 40 ifb$=chr$(78)goto44
  20. 42 goto36
  21. 44 print"[147]   dann ueberleg's dir inzwischen!!"
  22. 45 print"[152]            >>>>>shift!<<<<<            ":goto51
  23. 46 fora=oto25:print"[147][156]dann brauchst du ihn ja ueberhaupt nicht"
  24. 48 print"          verschenke ihn doch!          [145][145][145]";
  25. 49 print"[152]            >>>>>shift!<<<<<            ":nexta:goto50
  26. 50 ti$="000003":wait161,5 :syss:sys58253
  27. 51 ti$="000003":wait161,9:syss:sys58253
  28. 52 print"[147][144]load"chr$(34)"$";
  29. 54 printchr$(34)",8":print:print
  30. 56 print:print:print"list"
  31. 58 poke198,3:poke631,19:poke632,13:poke633,13:print"[151]":end
  32.